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FACILITY: SYSTST (SATS SYSTEM SERVICE TESTS) 
ABSTRACT: 

HIS MODULE CONTAINS SUBROUTINES WHICH, WHEN LINKED 
WITH SUCCOMMON.OBJ, FORM TEST MODULE SATSSS82 TO TEST SUCCESSFUL 
OPERATION OF THE SSETPRT SYSTEM SERVICE. THE SERVICE IS INVOKED 
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75 .PSECT RODATA,RD, NOWRT N XE. LONG 
d TEST MOD NAHE: ; STRING SATSSS ; 
TEST-MOD-NAME_D: STRING f. RA TSSS 
A: MSG1—INP~ Palit STRING I.< SSSPT! j2w: to 
: MSG3_ERR_CTL:: STRING I,< *SSSPT!42w: ! 
é RWMODES .BYTE PRTSC_KW, - i 
PRTSC~ -EW. - - F 
4 PRTSC_S $ 
§ PRTSC” “iu ; 
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7 7 «PSECT RWDATA,RD,WRT,NOEXE,LONG 
PRIVMASK: -BLKQ 1 ; ADDR OF PRIVILEGE peg CIN PHD) 
C PROT: -BLKL ; PROT ARGUMENT FOR SETPRT 
14 C Q RETADR: -BLKQ 1 3 RETADR ARGUMENT FOR SETPRT 
000001C 14 91 INADR: -BLKQ 1 i 1 ARGUMENT FOR SETP 
454 $4 1¢ 35 PRVPRT: -BLKB 1 ; PRVPRT ARGUMENT FOR SETPRT 
0000002 01D 935 INADR2: -BLKQ 1 ; INADR ARGUMENT FOR NON-SUBJECT SETPRT 


AONMAAAAOAAOAOOAOAOODPRAPMAPRHARARNOENO “Vv 


FDOAOOOOOOOOOOOOON 


Page 


9 
Yee ests scent uCe SEIN BLOGHER SRSRAEED sn PP 


SATSS58e SATS 
v04-000 CONDI SEP=1984 
-SBTTL CONDITION TABLES 
: weett CONDITION TABLES FOR SETPRT SYSTEM SERVICE *eee* 
COND 1,NOTARG, <REGION>,=- 
<PROGR 


GRAM>, = 
<CONTROL>,= 
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«LONG 0 ; PROGRAM 
- LONG 1 ; CONTROL 
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COND  3,NOTARG,<HIGH-ORDER 2 BITS OF PROT CODE>,- 
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<URSW, UREW, URKW, OR UR>,- 
.BYTE 0.1.2.3 
COND 4 ,NOTARG. <LOW-ORDER 2 BITS OF PROT CODE>,- 


< >,- 
<RESERVED, EW, SREW, OR UREW>,- 
<KW, ER R 


03 02 01 00 


° OR URKW>,=- 


<KR, ER. SR: OR UR>,- 
.BYTE 0,1,2,3 
COND 5, NULL 
5 .PSECT SATSSS82.RD.WRT,EXE 
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.SBTTL TM_SETUP, TM_CLEANUP 

FUNCTIONAL DESCRIPTION: 
TM_SETUP AND TM_CLEANUP ARE CALLED TO PERFORM 

REQUIRED HOUSEKEEPING AT THE BEGINNING AND END, RESPECTIVELY, OF 
TEST MODULE EXECUTION. 
CALLING SEQUENCE: 

BSBW TM_SETUP ®8SBW TM_CLEANUP 
INPUT PARAMETERS: 

NONE 
IMPLICIT INPUTS: 

NONE 
OUTPUT PARAMETERS: 

NONE 
IMPLICIT OUTPUTS: 


TM_SETUP: COND TABLE INDEX REGISTERS (R2,3,4,5,6) CLEARED; 
ALL PRIVILEGES ACQUIRED. 


COMPLETION CODES: 
EFLAG SET TO NON-ZERO IF ERROR ENCOUNTERED. 
SIDE EFFECTS: 


SS CHECK AND ERR_EXIT MACROS CAUSE PREMATURE EXIT 
(VIA RSB) IF ERROR ENCOUNTERED. 
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TM_SETUP: : 
53 CLR Re : INITIALIZE 
D4 CLRL ORR : .. CONDITION 
4 04 CLRL = RG : tie. TABLE 
5 D4 CLRL RS reg: TT 
g Rs CLRL R6 e eeeeseoeee REGISTERS 
FFF3" 30 6 BSBW § MOD_MSG_PRINT : PRINT TEST MODULE BEGIN MSG 
00000000'EF 000000 EF D : MOVAL TEST_MOB_SUCC,TMD_ADDR ; ASSUME END MSG WILL SHOW SUCCESS 
03 900000 BF f INSV  #SUCTESS7#0,#3,MOB_MSG_CODE ; ADJUST STATUS CODE FOR SUCCESS 
: D T0,5$,KRNL : KERNEL MODE TO ACCESS PHD 
59 O'9F D0 MOVL aaCTL$GL_PHD,RO GET PROCESS HEADER ADDRESS 
800008 ‘EF | 69 ? MOVAL  PHDSG_PRIVMSK(R9),PRIVMASK ; GET PRIV MASK ADDRESS 
9 MODE ROM,5$ ; BACK TO USER MO 
92 PRIV ADD, ALL ; GET ALL PRIVILEGES 
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77 ; SSETPRN_S TEST_MOD_NAME_D ; SET PROCESS NAME 
84 SS CHECK NORMAL ; CHECK STATUS CODE RETURNED FROM SETPRN 
05 OOAE 195 RSB ; RETURN TO MAIN ROUTINE 
AF 196 TM_CLEANUP: : 
FFGE' 30 AF 19 BSBW MOD_MSG_PRINT : PRINT TEST yMQDULE END MSG 
0B2 198 RSB ; RETURN LUTINE 
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WHENEVER A NEW 
ION_OF SUCCOMMON 
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CTIVELY. 
; RETURN TO MAIN ROUTINE 
; RETURN TO MAIN ROUTINE 


; RETURN TO MAIN ROUTINE 
; RETURN TO MAIN ROUTINE 
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BSBW CONDX_CLEANUP 
WHERE X = 1,2,3,4,5 


INPUT PARAMETERS: 


CONTAIN CURRENT CON 


TABLES 1,2,3,4,5, 
CONFLICT SET TO NON-ZERO IF COND TABLE CONFLICT DETECTED. 


IMPLICIT OUTPUTS: 
R2,3,4,5,6 PRESERVED 


R2,3,4,5,6 

FOR COND 

COMPLETION CODES: 
NONE 


CONFLICT = 0 
OUTPUT PARAMETERS: 


BSBW CONDX 
IMPLICIT INPUTS: 


NONE 
RSB 
RSB 
RSB 
CLEANUP: : 
RSB 
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CONDITION SUBROUTINES = SETUP AND CLEANU 5-SEP=1 4: UETPSY.SRCJSATSSS82.MAR; 1 
05 : 34 ae cose up: ; RETURN TO MAIN ROUTINE 
05 : 6 EE RSB ; RETURN TO MAIN ROUTINE 
senehcolk 95 f é 1sTB COND3. ECR4] if FIRST CONDITION 3 ELEMENT ? 
01 OOO0OTA3"EF AS 9 Ce 64 CMP COND4 ECRS].A1 ; zND” CONDITION & G ELEMENT ? 
00000000'EF  O0000000'EF 90 Oe $9 MOVB ONES, CONFLICT : Yes o- [HLS PROT CODE en 
| : 3 
Sopp $5 cape SB ; RETURN TO MAIN ROUTINE 
$08 49 Meir Wes ; RETURN TO MAIN ROUTINE 
30D 5g — RSB ; RETURN TO MAIN ROUTINE 
SODA re i ; RETURN TO MAIN ROUTINE 
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y04=000 FORM_CONDS “SEP=19 198 gi: 93: Hi UETPSY.SR ae TSalessho.mars1 ada: { 
DB 7 x .SBTTL FORM_CONDS 
DB 5 : FUNCTIONAL DESCRIPTION: 
DB 1: M_CONDS FORMATS AND PRINTS IN NF ORMAT ION ABOUT 
DB ; ; THE CURRENT ELEMENT IN EACH OF THE CONDITION TABLES. 
DB , ; CALLING SEQUENCE: 
ObB $ ; BSBW FORM_CONDS 
DB 8 ; INPUT PARAMETERS: 
obB 30 ; NONE 
ObB 36 : IMPLICIT INPUTS: 
ODB 294: R2,3,4,5,6 CONTAIN CURRENT CONDITION TABLE INDEX VALUES 
00DB «295 : FOR COND TABLES 1,2,3,4,5, RESPECTIVELY 
00DB 296: FOR X = 1,2,3,4,5 : 
00DB 297: CONOX.T’= TITLE TEXT FOR CONDX TABLE 
ODB 298: CONDX-TAB = ELEMENT TEXT FOR CONDX TABLE 
0DB 299: CONDX"C = CONTEXT OF THE CONDX TABL 
8908 89 3 CONDX-E = DATA ELEMENTS OF THE CONDX TABLE 
00DB 0¢ : OUTPUT PARAMETERS: 
0008 03 ; 
mi 
00DB 306 : IMPLICIT OUTPUTS: 
0008 +4307 : 
cs a 
00DB 310 : COMPLETION CODES: 
00B «311: 
ope \§ : NONE 
0008 14 : SIDE EFFECTS: 
0DB 15 ; 
00DB 18 : NONE 
00DB 17 ; 
0DB 318 :-- 
Opp 4319 
Be 
op é FORM_CONDS: : 
DB $FAO_S MSG1_INP -CTL,FAO_LEN,FAO_DESC. TESTNUM 
OFA 4 7 FORMAT CONDITIONS HEADER MSG 
FFO3' 30 OOFA 5 BSBW  OUTPUT_MSG : ... AND PRINT IT 
14 00 91 O0FD : CMPB ss #@COND1-C, NULL : 18 CONDITION 1 NULL ? 
0 1 1 BNEQU 1 : NO == CON 
o0cB 3 8 it BRW FORM_CONDSX : YES == SUBROUTINE IS FINISHED 
9025" EF DE 01 0 "  MOVAL = COND1_T site! : SAVE ADDRESS OF CONDITION 1 TITLE FOR FAO 
oonpnoneee o,f 900080 aners p 110 MOVL COND! ie R2] MSG B ; SAVE ADDR OF COND 1 CURR TEXT ELT FOR FAO 
00 fr 116 ; MOVB ONDT G_¢Tx SAVE CONDITION 1 CONTEXT FOR FAO 
12 MOV_VAL COND cs CONGT “i tked. MSG _baial ; GIVE COND 1 DATA VALUE TO FAO 
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WRITE_MSG2 
FCOND2 ¢ C,#NULL 


FORM_CONDSX 


COND affst ; SAVE ADDRESS OF CONDITION 2 TITLE FOR 
COND Sti R3] MSG_8 ; SAVE ADDR OF COND 2 CURR TEXT ELT FOR 
#CON 6_€TxT SAVE CONDITION 2 CONTEXT R FAO 

COND ct at Nb? “ECR3I, MSG_ BATAT GIVE COND 2 DATA VALU TO FAO 
WR FORMAT AND WR rE CONDITION MSG 
#COND3_C,#NULL 1S CONDITION L ? 

FORM_CONDSX 


3; NO == CONTINU 
t YES == SUBROUTINE IS FINISHED 
COND MSG A : SAVE ADDRESS OF CONDITION 3 TITLE FOR 
COND “Tie RZJ,MSG_B8 ; SAVE ADDR OF COND 3 CURR TEXT at FOR 
#COND3_C,MSG_CTXT™ SAVE CONDITION 3 CONTEXT FAO 
COND “C, COND3_ELR4],MSG AbATAL GIVE COND 3 DATA VALUE TO FAO 
wR ; FOR MAT AND WRITE CONDITION 3 MSG 
1S CONDITION 4 NULL ? 
E S == SUBROUTINE IS FINISHED 
AVE ADDRESS OF CONDITION 4 TITLE FOR 
AVE ADDR OF COND 4 CURR TEXT E ELT FOR 


wCON D%_C,MSG : SAVE 
OND4 a, © ON eE Cres), MSG G_bAT Al ; GIVE COND 4 DATA VALUE TO. FAO 


PAFORMAT AND WR TE CONDITION 4 MSG 

1$_ CONDITION ee 

: YES == SUBR OUTINES is F INISHE 

CONDS_T : SAVE ADDRESS OF CONDIT 10N 5 TTL FOR 
COND CTABERES MSG B ; SAVE ADDR OF COND 5 CURR TEXT ELT FOR 


A MSG SAVE CO AO 
CON OND ‘t  ONDS. ECRO), MSG_DATA1 ; GIVE COND 5 DATA VALUE TO FAO 
WRITE-MSG2 ; FORMAT AND WRITE CONDITION 5 MSG 


; RETURN TO CALLER 
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SATS SYSTEM SERVICE TESTS SSETPRY (SUCC 16-SEP-1986 9 YAX/VMS Macro vO4~ Page 13 
VERIFY Bree emake bo rssise LOE eee eae e lt OS aaps1 Page 13, 


“TSTB arte ; aaa iy NE aay BE PRINTED ? 


BEQL $ : 

BSBW  FORM_CONDS > YES <= FMT & PRINT ALL CONDS FOR THIS T.C. 
CLRQ INA R ; CLEAR TO INDICATE EXPREG NOT ISSUED YET 
MODE LET ACMODE ARGUMENT CONTROL MODE 
SEXPREG_ g "BRGENT=H2S RETA apps tnabee ACMODE=AC MODECR3], - 

REGION=COND1_ECR2]  ; GRAB A HUNK OF SPACE 

MODE iF + BACK to” USER move 

SS_CHECK NORMAL : CHECK NORMAL COMPLETIO 

CVTBL #=1,P : TRY TO CONFUSE vSETPRT ‘ITH of HcORDER BITS 

MOVB COND4_E R5].PR PROT : 2 LOwW- R BIT S OF P 

MOVB COND3~E : PICK UP 2 HI-ORDER BITS . 

INSV RO, 48 PROT + 4s. AND FORM A COMPLETE CODE 

MODE - T0. 10$, KRNL : LET ACMODE ARGUMENT CONTROL MODE 


weeeee SYSTEM SERVICE CALL WHICH IS THE SUBJECT OF THIS TEST CASE *eee08 


4+ al $s bogey: RETADR, ACMODECR3I, a ePRVPRT 


; BACK TO USER MODE 
CMPL RG On és$ _NORMAL : CODE RECEIVED = CODE EXPECTED ? 
BNEQU e0$ : NO == GO PROCESS ERROR 

BRW 0$ > YES == CONTINUE 

MOVL  #SS$_NORMAL,EXPV ; LOAD UP EXPECTED A 


MOVL RECEIVED VALUES, THEW EXIT 


RECV 
ERR_EXIT LONG, <INCORRECT STATUS tobe RETURNED FROM SETPRT> 


HPL JNADRRETADR ; DID SETPRT BEGIN AT RIGHT PLACE ? 
CMPL JNADR+4 ,RETADR+4 DID IT DO_ALL OF THE PAGES ? 
BNEQU 35$ ; NO == THAT'S NO GOOD EITHER 

BRB : YES == ALL IS OK, SO FAR 


MOVQ _—INADR, EXPV ; LOAD UP PAIR OF EXPECTED 
MOVQ _RETADR, RECV i AND RECEIVED VALUES, THEN EXIT 
ERR_EXIT QUAD,<SETPRT DID NOT FUNCTION > 

<ON REQUESTED RANGE OF PAGES> 


CMPB PRVPRT ,RWMODESCR3) ; WAS PREV PROT R/W ? 

BEQLU 60% : YES == DO MORE CH ECKING 

MOVB pune stR2i- EXPV : NO -- LOAD UP EXPECTED AND 

MOVB PRVPRT,RECV RECEIVED VALUES {eR exif 
ERR_EXIT BYTE,<INCORRECT PRVPRT vate RETURNED BY SETPRT 

CMPB PROT, #PRTSC_NA ; IS PROT CODE NO-ACCESS ? 

BNEQU 70% ; NO -- CO 

MOVB #PRTSC_KR,PROT : YES -- NA IS CHANGED TO KR 
MOVL INADR, INADR ; REGUS $1 A ees of" 1 PAGE ... 
MOVL INADR "oy +4 ; TO VERIFY PROT CODE 


MODE  _T0,65$,KRN : GET KERNEL MODE” 


ssSBa 


00000008 ' EF 


00000' EF 
00000" EF 


0000001C EF 


Bo0000%¢ EF 


oO 
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(SUCC = 


467 484 $SET 
48D 485 MODE ROM, 65 
4 4 6 SS$_CHECK NORMAL 
91 0488 4 CMPB Ss PRVPRT, PROT 
13 O4c3 «4 BEQLU VERIFY 
3 405 4 MOVE PROT, EXPV 
400 4 MOVE PRVPRT,RECV 
4B 49 
3 492 VERIFYX: 
05 0521 49 RSB 


SEP=1984 
SEP=1984 


PRT_ fp ANAD GS -RETADR ACRODECAS3 


4 Bei88i5. HOETPSY.SRESSAYSSsb2.man:1 "28° U4, 


PROT, PRVPRT 
; BACK fO USER MODE 

CHECK FOR NORMAL RETURN 
DID SETPRT RETURN SAME PROT VALUE ? 


- “LOAD UP EXPECTED AND . 
RECEIVED VALUES, THEN EXiT 


i 


ERR_EXIT BYTE,<PROT CODE NOT presenién BY SETPRT> 


; RETURN TO CALLER 
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wo 
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DVPVIV IV IVLIVIVDIV LVI LULU IVLVIVPVIUIUDUIULUSIUIVSIVSIVSIUS USUI VSS USUI ISIS IS IST ISIOSIOSISIS SE ~~ 


SVS BB BB EEE PWN AIP POPONIPUNIPYUNINYD 2 OO S| MDOOOOOOCOOOCOOOWOONO 


“SEP=1984 UETPSY.SRCIJSATSSS 
~SBTTL VFY_ CLEANUP 


FUNCTIONAL DESCRIPTION: 


VFY CLEANUP EXECUTES SYSTEM SERVICES TO UNDO THE 

EFFECT OF THOSE ISSUED IN THE VERIFY SUBROUTINE. VFY_CLEANUP MUST 
ASSUME THAT VERIFY MAY NOT HAVE EXECUTED IN ITS ENTIRETY (IF AN 

ERROR IS FOUND). ALSO, VFY_CLEANUP MAY ISSUE SS_CHECK OR ERR_EXIT 
ONLY AFTER PERFORMING ALL OF ITS CLEANUP OPERATIONS; THIS IS REQUIRED 
IN THE EVENT THAT VFY CLEANUP IS CALLED DURING ERROR PROCESSING, 

HEN PERFORMING THE REQUIRED CLEANUP IS MORE IMPORTANT THAN 

POSSIBLY DISCOVERING A SECOND ERROR. 


CALLING SEQUENCE: 

BSBW VFY_ CLEANUP 
INPUT PARAMETERS: 

NONE 
IMPLICIT INPUTS: 


R2,3,4,5,6 CONTAIN CURRENT CONDITION TABLE INDEX VALUES 
FOR CON ND TABLES 1,2,3.4,5, RESPECTIVELY 


FOR X = 14,5: 
Loni "E - ADDRESS OF TABLE OF DATA VALUES FOR CONDX 
TABCE. IF THE CONTEXT OF TABLE X IS A SYSTEM SERVICE 
ARGUMENT, THE ARGUMENT NAME MAY BE USED AS A SYNONYM 
FOR CONDX_E. 
OUTPUT PARAMETERS: 
NONE 
IMPLICIT OUTPUTS: 
NONE 
COMPLETION CODES: 
EFLAG SET TO NON-ZERO IF ERROR ENCOUNTERED. 
SIDE EFFECTS: 


SS_ CHECK AND ERR_EXIT MACROS CAUSE PREMATURE EXIT 
(VIA RSB) IF ERROR ENCOUNTERED. 


Sete Se Ge Gee Ge Ge Se Ge Se Ge Ge Se Ge Ge Se Se Ge Ge Ge Se Ge Ge Ge Fe Se Se Ge Ge Ge Fe Ge Ge Ge Ge Ge Se Ge Se Se Sete Ge Ge Ge Gete 


VEY CLEANUP: 


STL. 1NADR ; DID EXPREG GET ISSUED SUCCESSFULLY ? 
BNEG 0$ 3 YES == CONTINUE 
BRW VF Y_CLEANUPX ! NO <= JUST EXIT 


OOD NAME WIN 9 OO NAME WIN SO OD NAME WIN O OO NOAU EWEN 2 OO ONA UE WW OOONOM 
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$042000 VFY_CLE gree Tobe 81:98: Hy UETPSY.SRC Tee +e MAR; 1 - ip 
: MODE  10,20$,KRNL : NEED KERNEL TO SPECIFY MODE 
SDELTVA_S 5 ANADR, ,ACMODECLR3] : GET RID OF EXPANDED REGION 

MODE : BACK TO USER MODE 
a S$ CHECK FRON, 206 + CHECK RETURN FROM DELTVA 
591 
592 


3? VF Y_CLEANUPX : 
RSB ; RETURN TO CALLER 


SATSSS82 
Symbol table 


A 
SSSSTRINGS 
Ses TRINGSS 


m: 
COND >” CLEANUP 
CONDS-T 
CONDS~ TAB 
CONFLICT 
CTL$GL_PHD 
DESC 
EFLAG 


Reeeeeke 
RERRRERE 
Reekeene 
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So 
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“ax 
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no 


ONES 
OUTPUT_MSG 
PCV 
PHD$Q_PRIVMSK 
PRIVMASK 


PRIV_ARGS 
PROCESS_ERR 
PROT 


RECV 
REST_REGS 
RETADR 


ue Ng eH 
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RRAREKERE 
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Reeeeeee 
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Reeetene 
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genrkeene 
eeeeeene 
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SATSSS82 SATS SYSTEM SERVICE TESTS SSETPRT (Succ 19-5 P 
Symbol table “SEP 
TM_CLEANUP 204 RG 4 
TM-SETUP 206 RG 4 
VERIFY RG 4 
VERIF YX 25) R 4 
VFY_ CLEANUP 3038 RG 4 
VF Y-CLEANUPX R 4 
WOR = ap 002 G 
WRITE_MSG2 teeeeere =X 04 

peer ems senmoonecne 2 

! i _Psect synopsis ! 
PSECT name Allocation PSECT No. Attributes 
. AB 00000000 ( 0.) 00 ¢ 0.) NOPIC  USR 
SABSS 44449 ( 3° 1¢ 1.) \NOPIC USR 
RODATA 00000055 < “a ; ( ¢°) NOPIC USR 
RWDATA Hs bE: ( 426.) Q3 ( -) NOPIC USR 
SATSSS82 0000059 ( 1426.) 04 ¢( 4.) NOPIC  USR 

jJaccanenueseseneerenenwen 
! Performance indicators ! 

Phase Page faults CPU Time Elapsed Time 
Initialization 33 00:00:00.06 00:00:00.56 
Command processing 107 00:00:00.74 es BL 
Pass 329 00:00:10.97 BB 388? 19-8 
Symbol table sort Ss St 0:00:01.41 
Pass 2 12 Ba 202.43 00:00: 5°16 
Symbol table output 1 0:00: 5°48 98:8: 0.1 
Psect synopsis output 3 88: 0:00.0 0:00:00.03 
hoaee-Tetarenns output 0: * 2-99 es ae 
Assembler run totals 606 00:00:15. 00:00:24.0 


The working set Limit was 1350 pages. 

59058 bytes (116 pages) of virtual memory were used to buffer 
There were 50 pages of symbol table {wees allocated to hold 76 
58 source Lines were read in Pass 1 


9 pages of virtual memory were used to define macros. 


See se nee toe sce ew eeoansrwomae $ 


Macro Library name 


=B35S8ouase: tae -MLB; ! 


$255$DUA SySt SBISTARLET AL MLB; 2 1 
TOTALS (all Libraries) 2 


11135 GETS were required to define 27 macros. 


There were no errors, warnings or information messages. 


CON 
CON 
CON 
CON 


he intermediate code. 
non-local and 49 local symbols. 
eaatine sb object records in Pass 2 


71986 84:98:54 


oe NOEXE NORD 
EXE RD 


LCL N 
LCL NOS 
LCL NOSHR NOE XE 
LCL os NOE XE 
LCL NOSHR- EXE 


AX/VMS Mac 
UETPSY.SRC 


ro V04- Page 18 
Teatossbo.maR:1 . (1) 


NOWRT NOVEC BYTE 


RD NOWRT NOVEC LONG 
RD WRT NOVEC LONG 
RD WRT NOVEC BYTE 


M10 
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Page 19 
VAX=11 Macro Run Statistics -SEP-19 


acro V04- 
UETPSY.S Bae oe yee sao mans 1 (1) 


MACRO/LIS=L1IS$:SATSSS82/0BJ=0BJ$:SATSSS82 MSRC$:SATSSS82/UPDATE=(ENH$: SATSSS82) +EXECMLS$/LIB+SHRLIB$:UETP/LIB 


NT CORPORATION 
D PROPRIETARY 


AH-BT13A-SE 
VAX/VMS_ V4.0 


042 


